Revista CD Expert 8/Revista CD Expert nº 08 CD1.iso/Utilitarios/Especiais/Hotdog 5.5/hotdog55install.exe/%MAINDIR%/HotDog5.exe/0/RCDATA/TFRMIMAGEWIZ/TFRMIMAGEWIZ.txt

Text File | 1999-04-29 | 16.0 KB | 649 lines

object frmImageWiz: TfrmImageWiz
  Left = 121
  Top = 113
  BorderIcons = [biSystemMenu, biHelp]
  BorderStyle = bsDialog
  Caption = 'Image Wizard'
  ClientHeight = 287
  ClientWidth = 417
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Pitch = fpVariable
  Font.Style = []
  Position = poScreenCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object spdImgFile: TSpeedButton
    Tag = 56
    Left = 218
    Top = 47
    Width = 21
    Height = 21
    Glyph.Data = {
      DE000000424DDE0000000000000076000000280000000D0000000D0000000100
      0400000000006800000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
      F000F000000000FFF00000888888880FF000080FBFBFBF0FFA5F080BFBFBFBF0
      F0000880BFBFBFB0F0000880FBFBFBFB0000088800000000000008888888880F
      F0000888800000FFF000F0000FFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFF
      F000}
  end
  object lblImgHeight: TLabel
    Tag = 57
    Left = 5
    Top = 73
    Width = 96
    Height = 13
    AutoSize = False
    Caption = 'Height :'
    WordWrap = True
  end
  object lblImgWidth: TLabel
    Tag = 57
    Left = 135
    Top = 73
    Width = 86
    Height = 13
    AutoSize = False
    Caption = ' Width :'
    WordWrap = True
  end
  object lblImgAlt: TLabel
    Tag = 59
    Left = 7
    Top = 117
    Width = 254
    Height = 14
    AutoSize = False
    Caption = 'Text description of the image :'
  end
  object SpeedButton4: TSpeedButton
    Left = 240
    Top = 47
    Width = 21
    Height = 21
    Caption = 'Wiz'
    OnClick = btnClickLinksClick
  end
  object Label6: TLabel
    Tag = 57
    Left = 6
    Top = 30
    Width = 50
    Height = 13
    AutoSize = False
    Caption = 'Filename:'
    WordWrap = True
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 417
    Height = 249
    ActivePage = TabSheet5
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = 'TabSheet1'
      TabVisible = False
      object Label1: TLabel
        Left = 130
        Top = 8
        Width = 265
        Height = 30
        AutoSize = False
        Caption = 'This wizard will help you to insert an image into your Web page.'
        WordWrap = True
      end
      object Label4: TLabel
        Left = 130
        Top = 45
        Width = 265
        Height = 45
        AutoSize = False
        Caption =
          'Images are one of the most important tools that can be used in c' +
          'reating a Web page, and should be utilized to clearly present in' +
          'formation to the visitor. '
        WordWrap = True
      end
      object Label5: TLabel
        Left = 132
        Top = 217
        Width = 267
        Height = 21
        Caption = 'To continue, Click on the Next button.'
        WordWrap = True
      end
      object Label27: TLabel
        Left = 130
        Top = 96
        Width = 265
        Height = 58
        AutoSize = False
        Caption =
          'Remember, some visitors choose not to display images, so try not' +
          ' to make the content of your Web page too dependent on your imag' +
          'es, or at least duplicate the information in the images in text.' +
          ' '
        WordWrap = True
      end
      object imgSwirl: TPaintBox
        Left = 8
        Top = 11
        Width = 111
        Height = 219
        OnPaint = imgSwirlPaint
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'TabSheet2'
      TabVisible = False
      object Label2: TLabel
        Left = 142
        Top = 6
        Width = 253
        Height = 26
        Caption =
          'Where is the image you want to insert located? Click on the Brow' +
          'se button to find it.'
        WordWrap = True
      end
      object btnImage: TSpeedButton
        Left = 380
        Top = 37
        Width = 22
        Height = 22
        OnClick = btnImageClick
      end
      object btnClickLinks: TSpeedButton
        Left = 379
        Top = 121
        Width = 22
        Height = 22
        OnClick = btnClickLinksClick
      end
      object SpeedButton2: TSpeedButton
        Left = 385
        Top = 170
        Width = 25
        Height = 21
        Visible = False
      end
      object Label7: TLabel
        Left = 142
        Top = 151
        Width = 261
        Height = 56
        AutoSize = False
        Caption =
          'Your image is now ready. Just click FINISH to insert it into you' +
          'r web page. If you want to adjust other features, such as size, ' +
          'position or alignment of your image, click ADVANCED.'
        WordWrap = True
      end
      object Label8: TLabel
        Left = 142
        Top = 76
        Width = 259
        Height = 43
        AutoSize = False
        Caption =
          'You can use images as clickable links to other web pages. If you' +
          ' want to use this image as a link, type the URL of the web page ' +
          'in the space below.'
        WordWrap = True
      end
      object pmimgPreview: TPMultiImage
        Left = 6
        Top = 6
        Width = 108
        Height = 223
        AutoSize = True
        B_W_CopyFlags = [C_DEL]
        Color = clBtnFace
        ImageName = 'file not found'
        ImageReadRes = lAutoMatic
        BlitMode = sLight
        ImageWriteRes = sAutoMatic
        TifSaveCompress = sNONE
        TiffPage = 1
        TiffAppend = False
        JPegSaveQuality = 25
        JPegSaveSmooth = 0
        RubberBandBtn = mbLeft
        TextLeft = 0
        TextTop = 0
        TextRotate = 0
        TabOrder = 3
        TabStop = False
        Visible = False
        ZoomBy = 10
      end
      object butAdvanced: TButton
        Left = 326
        Top = 212
        Width = 75
        Height = 25
        Caption = '&Advanced'
        TabOrder = 2
        OnClick = butAdvancedClick
      end
      object txtImgFileName: TSausCombo
        Left = 141
        Top = 38
        Width = 239
        Height = 21
        HelpContext = 40
        ItemHeight = 13
        TabOrder = 0
        OnExit = txtImgFileNameExit
        PreventDuplicates = True
        MaxItems = 0
        MoveSelectedToTop = True
        Version = '1.05'
        RegPath = '\Software\Sausage\Hotdog\Config\Recent'
        RegValue = 'ImgFiles'
        RegStore = True
        Options = [scAddOnExit, scAddOnCR, scWriteOnExit, scWriteOnCR]
      end
      object cmbHref: TSausCombo
        Left = 141
        Top = 121
        Width = 238
        Height = 21
        HelpContext = 41
        ItemHeight = 13
        TabOrder = 1
        OnExit = cmbHrefExit
        PreventDuplicates = True
        MaxItems = 0
        MoveSelectedToTop = True
        Version = '1.05'
        RegPath = '\Software\Sausage\Hotdog\Config\Recent'
        RegValue = 'Href'
        RegStore = True
        Options = [scAddOnExit, scAddOnCR, scWriteOnExit, scWriteOnCR]
      end
    end
    object TabSheet3: TTabSheet
      Caption = 'TabSheet3'
      TabVisible = False
      object Label17: TLabel
        Left = 136
        Top = 18
        Width = 257
        Height = 57
        AutoSize = False
        Caption =
          'Some users choose not to display any images when they browse web' +
          ' pages. In this case, you can type a message that will appear in' +
          'stead of the image. This message also appears when the image is ' +
          'loading.'
        WordWrap = True
      end
      object Label9: TLabel
        Left = 134
        Top = 207
        Width = 252
        Height = 26
        Caption = 'To change the size and add a border to your image, click NEXT'
        WordWrap = True
      end
      object txtAlt: TEdit
        Left = 135
        Top = 106
        Width = 255
        Height = 21
        HelpContext = 39
        TabOrder = 0
        Text = 'Image Loading.....'
      end
    end
    object TabSheet4: TTabSheet
      Caption = 'tab sheet 4'
      TabVisible = False
      object Label10: TLabel
        Left = 150
        Top = 115
        Width = 65
        Height = 17
        AutoSize = False
        Caption = 'Image &width'
        FocusControl = txtWidth
      end
      object Label11: TLabel
        Left = 279
        Top = 115
        Width = 65
        Height = 13
        AutoSize = False
        Caption = 'Image &height'
        FocusControl = txtHeight
      end
      object Label18: TLabel
        Left = 130
        Top = 8
        Width = 265
        Height = 52
        Caption =
          'Below are the dimensions (in pixels) of your image. You can make' +
          ' the image bigger or smaller, by adjusting the pixel sizes accor' +
          'dingly. You can even create distortion effects! '
        WordWrap = True
      end
      object Label19: TLabel
        Left = 130
        Top = 66
        Width = 255
        Height = 39
        Caption =
          'Remember, changing the dimensions of an image, changes the overa' +
          'll size of the image, not how much of the image is displayed.'
        WordWrap = True
      end
      object Label20: TLabel
        Left = 130
        Top = 159
        Width = 260
        Height = 26
        Caption =
          'The border thickness is defined in pixels, and appears as a line' +
          ' around your image.'
        WordWrap = True
      end
      object Label21: TLabel
        Left = 130
        Top = 220
        Width = 147
        Height = 13
        Caption = 'Click NEXT to align your image.'
        WordWrap = True
      end
      object txtWidth: TEdit
        Left = 150
        Top = 131
        Width = 97
        Height = 21
        HelpContext = 36
        TabOrder = 0
        OnKeyPress = txtWidthKeyPress
      end
      object txtHeight: TEdit
        Left = 279
        Top = 131
        Width = 97
        Height = 21
        HelpContext = 37
        TabOrder = 1
        OnKeyPress = txtWidthKeyPress
      end
      object txtBorder: TSpinEdit
        Left = 238
        Top = 192
        Width = 51
        Height = 22
        HelpContext = 38
        MaxValue = 100
        MinValue = 0
        TabOrder = 2
        Value = 0
      end
    end
    object TabSheet5: TTabSheet
      Caption = 'TabSheet5'
      TabVisible = False
      object Label14: TLabel
        Left = 280
        Top = 66
        Width = 97
        Height = 17
        AutoSize = False
        Caption = '&Vertical distance'
        FocusControl = txtVert
      end
      object Label13: TLabel
        Left = 176
        Top = 168
        Width = 49
        Height = 13
        AutoSize = False
        Caption = '&Alignment'
        FocusControl = cmbAlign
      end
      object Label15: TLabel
        Left = 152
        Top = 66
        Width = 97
        Height = 17
        AutoSize = False
        Caption = '&Horizontal distance'
        FocusControl = txtHoriz
      end
      object Label22: TLabel
        Left = 130
        Top = 8
        Width = 260
        Height = 52
        Caption =
          'To stop text from appearing hard up against the image, you can d' +
          'efine a vertical and horizontal buffer (in pixels) that creates ' +
          'an envelope around your image.'
        WordWrap = True
      end
      object Label16: TLabel
        Left = 130
        Top = 113
        Width = 251
        Height = 39
        Caption =
          'The Alignment option allows you to align your image relative to ' +
          'the surrounding text. The usual options are None, Left or Right.'
        WordWrap = True
      end
      object Label23: TLabel
        Left = 130
        Top = 208
        Width = 234
        Height = 26
        Caption =
          'Click NEXT to setup a quickloading low resolution version of you' +
          'r image.'
        WordWrap = True
      end
      object cmbAlign: TComboBox
        Left = 232
        Top = 164
        Width = 89
        Height = 21
        HelpContext = 35
        ItemHeight = 13
        Items.Strings = (
          'Top'
          'Left'
          'Right'
          'Texttop'
          'Middle'
          'Absmiddle'
          'Baseline'
          'Bottom'
          'Absbottom')
        TabOrder = 2
        Text = 'Top'
      end
      object txtHoriz: TSpinEdit
        Left = 158
        Top = 82
        Width = 77
        Height = 22
        HelpContext = 33
        MaxValue = 100
        MinValue = 0
        TabOrder = 0
        Value = 0
      end
      object txtVert: TSpinEdit
        Left = 281
        Top = 83
        Width = 77
        Height = 22
        HelpContext = 34
        MaxValue = 100
        MinValue = 0
        TabOrder = 1
        Value = 0
      end
    end
    object TabSheet6: TTabSheet
      Caption = 'TabSheet6'
      TabVisible = False
      object SpeedButton3: TSpeedButton
        Left = 32
        Top = 199
        Width = 25
        Height = 21
        NumGlyphs = 2
        Visible = False
      end
      object btnBrowseLowSrc: TSpeedButton
        Left = 377
        Top = 146
        Width = 21
        Height = 21
        OnClick = btnBrowseLowSrcClick
      end
      object Label24: TLabel
        Left = 132
        Top = 219
        Width = 265
        Height = 17
        AutoSize = False
        Caption = 'Click FINISH to insert your picture.'
      end
      object Label25: TLabel
        Left = 136
        Top = 7
        Width = 266
        Height = 52
        Caption =
          'Because of the time it takes some users to load images, you can ' +
          'include a low resolution image that is loaded first. It gives th' +
          'e user some idea as to the appearance of your image.'
        WordWrap = True
      end
      object Label26: TLabel
        Left = 137
        Top = 69
        Width = 261
        Height = 44
        AutoSize = False
        Caption =
          'If you want HotDog to create a low resolution image, then click ' +
          'the checkbox below. The file will be created in the directory sh' +
          'own when this wizard is finished.'
        WordWrap = True
      end
      object Label3: TLabel
        Left = 132
        Top = 171
        Width = 263
        Height = 39
        Caption =
          'While windows makes no distinction between case in filenames, so' +
          'me systems do. It is advisable to insert all images in lowercase' +
          '.'
        WordWrap = True
      end
      object chkLowSrc: TCheckBox
        Left = 135
        Top = 125
        Width = 209
        Height = 17
        HelpContext = 31
        Caption = 'Create &Low Resolution Image'
        TabOrder = 0
      end
      object cmbLowSrc: TSausCombo
        Left = 133
        Top = 146
        Width = 245
        Height = 21
        HelpContext = 32
        ItemHeight = 13
        TabOrder = 1
        OnExit = cmbLowSrcExit
        PreventDuplicates = True
        MaxItems = 0
        MoveSelectedToTop = True
        Version = '1.05'
        RegPath = '\Software\Sausage\Hotdog\Config\Recent'
        RegValue = 'ImgFiles'
        RegStore = True
        Options = [scAddOnExit, scAddOnCR, scWriteOnExit, scWriteOnCR]
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 249
    Width = 417
    Height = 38
    Align = alBottom
    TabOrder = 1
    object butFinish: TButton
      Left = 251
      Top = 6
      Width = 75
      Height = 25
      Caption = '&Finish'
      TabOrder = 2
      OnClick = butFinishClick
    end
    object butNext: TButton
      Left = 251
      Top = 6
      Width = 75
      Height = 25
      Caption = 'Next >&>'
      TabOrder = 1
      OnClick = butNextClick
    end
    object butBack: TButton
      Left = 176
      Top = 6
      Width = 75
      Height = 25
      Caption = '&<< Back'
      Enabled = False
      TabOrder = 0
      OnClick = butBackClick
    end
    object butCancel: TButton
      Left = 330
      Top = 6
      Width = 75
      Height = 25
      Cancel = True
      Caption = '&Cancel'
      TabOrder = 3
      OnClick = butCancelClick
    end
    object btnHelp: TButton
      Left = 5
      Top = 6
      Width = 75
      Height = 25
      Caption = '&Help'
      TabOrder = 4
      OnClick = btnHelpClick
    end
  end
end